home *** CD-ROM | disk | FTP | other *** search
/ Medabots Cardz / Medabots CD Cardz Rokusho.bin / pc / assets / constructrokusho.swf / scripts / DefineSprite_163 / frame_8 / DoAction.as
Text File  |  2001-11-29  |  906b  |  39 lines

  1. xpart = "201";
  2. ypart = "358";
  3. x = getProperty("/sumilidon head", _X);
  4. y = getProperty("/sumilidon head", _Y);
  5. if(xpart + "5" < x)
  6. {
  7.    tellTarget("/")
  8.    {
  9.       setProperty("/sumilidon head", _X, getProperty("/sumilidon head", _X) - "8");
  10.    }
  11. }
  12. if(x < xpart - "5")
  13. {
  14.    tellTarget("/")
  15.    {
  16.       setProperty("/sumilidon head", _X, getProperty("/sumilidon head", _X) + "8");
  17.    }
  18. }
  19. if(ypart + "5" < y)
  20. {
  21.    tellTarget("/")
  22.    {
  23.       setProperty("/sumilidon head", _Y, getProperty("/sumilidon head", _Y) - "8");
  24.    }
  25. }
  26. if(y < ypart - "5")
  27. {
  28.    tellTarget("/")
  29.    {
  30.       setProperty("/sumilidon head", _Y, getProperty("/sumilidon head", _Y) + "8");
  31.    }
  32. }
  33. if(xpart - "6" < x and x < xpart + "6" and ypart - "6" < y and y < ypart + "6")
  34. {
  35.    setProperty("/sumilidon head button", _visible, "1");
  36.    setProperty("/sumilidon head", _visible, "0");
  37.    gotoAndStop(1);
  38. }
  39.